From: Martin Rudalics Date: Tue, 3 Jun 2014 12:38:17 +0000 (+0200) Subject: In display-buffer-use-some-window don't shrink window used (Bug#17671). X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~419 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=4a52a98a9a5a49719da0a44d5ab1ddfde9a2aedc;p=emacs.git In display-buffer-use-some-window don't shrink window used (Bug#17671). * window.el (display-buffer-use-some-window): Don't make window used smaller than it was before (Bug#17671). --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2ca78add203..6bb2147595d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2014-06-03 Martin Rudalics + + * window.el (display-buffer-use-some-window): Don't make window + used smaller than it was before (Bug#17671). + 2014-06-03 Eli Zaretskii * menu-bar.el (menu-bar-open): Fix last change: use the PC diff --git a/lisp/window.el b/lisp/window.el index c5093ca51a5..e9f4fd0b1d2 100644 --- a/lisp/window.el +++ b/lisp/window.el @@ -6497,7 +6497,7 @@ that frame." ;; resize it to its old height but don't signal an error. (when (and (listp quad) (integerp (nth 3 quad)) - (/= (nth 3 quad) (window-total-height window))) + (> (nth 3 quad) (window-total-height window))) (condition-case nil (window-resize window (- (nth 3 quad) (window-total-height window))) (error nil)))